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FROM: THE EDITOR 


In case you do not have our 
numbers then read on. 


President — Alan Moore 
(226-7118) 

Admin. — Michael Dove 
(745-1779) 

Software  — Bill Harmer 
(722-7184) 

Hardware  — John Mathewson 
(746-7849) 


Librarian — David Solly 
(731-2128) 
Treasurer — Iris Ten Holder 
(828-6648) 


MEETINGS IN REVIEW 


For those of us who are not always able to attend our monthly 
meetings you might be interested in a summary of the highlights 
of those meetings (September through to November 1997). 

At our September meeting, John Mathewson demonstrated his 
prototype speech synthesizer. At present it is capable of 
handling 64 basic (different) sounds. It was quite impressive 
and readily understandible. John hopes to have the bugs worked 
out in the next couple of months. He uses a ZX81 power supply to 
run the unit. Iris Ten Holder demonstrated her Payroll program. 
It is a ZX81 program which is used with a 64K Rampack. Iris uses 
this program to prepare weekly and monthly paystubs for her 
restaurant employees. Dave Solly demonstrated a modified program 
which utilized German and Hebrew character sets instead of the 
normal 2068 characters. He was then able to have it printed out 
on his printer. 

Our November meeting was taken up almost entirely by 
discussions surrounding the possiblity of setting up our oun 
bulletin board. John indicated that he could get hold of some 
non functional modem boards. He would be willing to try and 
repair them at cost for those who would like to have a modem. He 
indicated that he woudn't ob,ject to using one of his 2068 
coupled to a disc drive to operate a bulletin board. Discusion 
on uhether this would operate 24 hours of the day or at specific 
hours will be discussed later. The interest by members that 
presentiy had boards and those uho uould like to have modems 

_.. 22 . makes it feasible to run our oun system. — PWE ee ORE RES IE 

At our November meeting the repaired modems were 

distributed. Most of the meeting was spent familiarizing 
individuals with the pros and cons of software to be used with 
the modems. The modems and software would allow ZX81 and 2068 
users to communicate directly with each other or via a bulletin 
board. The discussions on the bulletin board will continue at 
the December meeting. Clem Holden gave a EE on one of 
his current programs: | 
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COPY RIGHT 
The issue of copy right is a grey area and not understood by 
most of us. Following are exerpts of information on copy right 
coming from Bill Harmer, the DALLAS TIMEX/SINCLAIR AMSTRAD USER 
NEWSLETTER and the July/August 1987 issue of Canada Computes. 


Of increasing concern to computer users and amateur programmers 
is the matter of copyright protection of our own and others’ programs. 
Unfortunately there is more misinformation circulating on this subject 
than real knowledge. So it was with great relish that the writer viewed 
the opportunity to learn more about this subject from a lecture by a 
young lawyer from the local firm of Gowling and Henderson at a meeting 
in May of the Ottawa IBM PC User Group. 

Please bear in mind that what follows is a combination of reportage 
and the attempts of the author to explain some of the concepts that were 
brought up at the lecture and must not be construed as absolutely certain 
legal advice for which (if it exists even in theory) you must consult a 
copyright lawyer yourself, 

One of the things that it is possibly easiest to explain are some of 
the misconceptions that the writer has heard over the grapevine, 

Misconcertion: when a program listing is published in a newsletter, 
magazine or book some of or all of the restrictions on use of the program 
are forfeited by the copyright holder. Some even have said that it thus 
becomes public domain, 

According to the lecture nothing could be further from the truth. Not 
only are none of the protective or restrictive features of a copyrighted 
program lessened by publication but in fact the copyright owner's position 
is strengthened legally since the appearance of the book or magazine on 
a specific date is additional proof if needed of date of publication, a 
part of the copyright's legal support. 

So any program published in listing form in fact cannot necessarily be 
Stored inzyour computer (that would be a copy), copied on tape or disk, 
or the copies given to anyone else, or the program republished under your 
own credit or copyright on the basis that you had made some modifications 
or improvements to it. 

The question of what you can do with a a published program depends 
entirely on the policy of the owner of the copyright and whether he/ she 
has ever granted any of the above rights to readers of the magazine for 
example. This policy may be stated somewhere in the magazine or book 
usually beside the copyright and publisher's name or it may not be anywhere 
and you may have to write the publisher to find out what the policy is. 

Misconception: to copyright one of your own original programs, you 
must apply to the government, submit a copy of the program and pay a fee. 
Some even go as far as to say that you must hire a lawyer to get a copy- 
right, 

à Again, nothing is further from the truth. Any program can be copy- 
righted and in fact from the time of its creation enjoys copyright prot- 
ection in the name of the author by simply publishing it with a notice 
such as, "Copyright 1987 by John Doe", All the rest including registering 


the copyright with the federal Department of Consumer and Corporate Affairs 


(for a fee or $35, no copy need be submitted), hiring a lawyer for legal 
advice and to dot all the "i"s and cross all the "f"s and take care of the 
paperwork is intended only to consolidate the legal position of the copy- 
right to the point where it would be harder for any other person to chal- 
lenge it on a point of legal detail or find some defect or loophole or 
way to circumvent the copyright holder's protection on a technicality. 
How much trouble and expense you want to go to to make your copyright 
ironclad depends as with insurance coverage limits on how valuable you 
think the item (in this case the program) is that you are trying to pro- 





tect. If you think that the program will make you wealthy hire a lawyer. 


OO 


If you think that the program is just another of many that you have 
written with little chance of making any money for you it wouldn't make 
all that much sense to run up a big bill at the lawyer's office for it 
now would it? 

Although there are a number of ways of protecting computer programs 
in special circumstances including patents, trade secret laws and trade 
mark laws, the most commonly used at our level of sophistication are 
copyrights and contracts. 

Copyrights can be used in combination with contracts to either give 
away some of the rights of copyright or to add to them. Armed with a 
copyright you can try some way of getting the user to sign or in some 
other way ta common way is putting a notice inside the shrinkwrap package 
afound a program saying that if you break open the shrinkwrapping you 
are agreeing to the often many terms of a contract between you and the 
manufacturer/ distributor restricting your use of the program) enter into 
a contract with the copyright holder adding additional restrictions and 
terms of use to those of the copyright. These restrictions might include 
such things as absolving the manufacturer for liability for program bugs 
or damage to equipment due to running it, restricting your right to make 
copies to a given number (say one back-up covy), restricting your right 
to use the program in more than one computer etc, 

On the other hand the author can give away any or all of his copyright 
protection or aspects of it. He/she mizht on the package or within the 
program grant free rights of use to members of the local user group, 
inhabitants of third world countries, teachers or educators, or whatever, 
In so called freeware, instead of issuing the program as public domain and 
including in it a solitictation for funds such as, "If you enjoyed this 
program, please send $20 to the author at such and such an address", you 
can protect some of your rights (commercial firms might remove your 
solicitation from the program and sell it or bundle it with other products) 
by copyrighting the program and then granting certain rights to the general 
publie. An example would be a notice such as, "Feel free to make copies of 
this program for your own personal use and for the inspection of your friends 
and if you enjoyed this program and wish to receive any up-dates or modif- 
ications and a nice user manual for it, please send $25 to the author....” 
Most of the so-called freeware etc. is now marketed in that way rather than 
casting it forth upon the waters in the public domain. 

In addition to legal rights of the programmer/author, the legal oblig- 
ations were also discussed. For example a programmer could be prosecuted 
for negligence if he/she didn't take proper time to test it for bugs and 
one of the bugs caused a user to take a financial loss. Also copy-protect- 
ion methods that trash the disk and the data entered even by an illegal 
user could be the subject of criminal code prosecution of the programmer 
under the Mischief section of the Criminal Code of Canada. Also the Sale 
of Goods Act and various pieces of consumer legislation might be invoked 
for faulty software. We all know that you can't write software without 
bugs, but the law demands that you make a conscientious effort to find 
them before the program goes out. On the other hand for the sort of hobby 
programs that most of us write the financial losses due to a bug are un- 
likely to be worth suing us for. Who is going to sue us for an hour of 
wasted time or data entry or a frustrating game? 

All and all, the lecture was a very interesting one , and of course 
lasting an hour and a half covered much more than reported above. 
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HH HHHH: EVERYTHING TOU EVER WANTED TO XEROX ABOUT 
COPYRIGHTS. 
"II 1987 in the Public Domaiw- 

l want to explain a littie | bave found out about copyright 
law, because it is really getting to'be an Inportant subject for 
everybody in the computer world, -not just for artists and 
playwrights and novelists. Mow ít is necessary for Prograneers to 
know what part of their work, if any, is protected from use or 
reproduction without their consent. 


IL will anger some to hear the truth being spoken. You 
bought a program (or record or tape or whatever) that was a 
commercial product, yours to use. The copyright prohibits you 
froa saking copies to seli or give auay. it does not say you 
can’t sake copies for your own private use, once you bought the 
arigimal product. Copyright does not say backups ars against the 
law.- Copyright does not say that you as the buyer are not 
entitled to choose when or where you use the product you bought, 
once again, as long as you are not making it available to a zon- 
private use. la fact, the only thing that says these things are 
wrong is the software license that the lawyers of the software 
company drafted in order to intisidate a potential copyright 
abuser, The License is a pre-sale contract with the user. Bead 
it. Don't buy software fros stupid companies. Keep in mind that 
breach of this contract is a civil matter; they aay choose to sue 
you aver it. Copyright violations are not the same thing, nat at 
all. Copyright violation is a Felony offense. 

Backups and additional private use copies are allowed under 
the copyright laws due to a section in them called FAIR USES. 

- Fair Use was written so that people could properly deal with a 
work, such as in reviewing or using it for private study. Private 
use seans that if the only sarket you are spoiling through your 
actions is YOU, and you already bought the vork once, no 
copyright violation erists. Additionally, Fair use means you in 
no vay are competing vith the work itself and what you are doing 
with the work is for educational, non-commercial purposes, such 
as extracting portions of a vork for reporting on it or the 
erents vhich surround it. 


You are NOT allowed to "spoil a sarket* for someone eise. ` 


Don't give away copies. Don't sell any copy (including the 
original) and keep any part of the work. Don’t republish the vork 
ot broadcast it in any fashion. Co-workers and friends who vant a 
copy should buy it thesselves. But if you abide by these things, 


the government doesn’t care if you personally have sade 3000 — 
duplicates for Yourself (one for each of your phobias?). The C 


software companies see this as practically am INVITATION to 
pirate, so they don’t vant you aware of the full law. Guilty 


unti] proven immoceat... that is the sotto of some of the 


companies. 
I So nou that you know... what about coapilers? They help you 
create your prograes, but they do this by stringing together 
. little stored pieces of code that they wrote. Can you thes seil 
your stand-alone applications program? Mot necessarily. The 
little pieces are integral to the operation of the coepiler and 


they are a part of the compiler’s copyright. They ate mostiy 


unique to the compiler. Now they art a part of your program, too. 
which is 0.K. since you can use the program yourself; but if you 
are creating a program to sell, you had better darn sure check 
inta the OBJECT CODE DISTRIBUTION requirements the compiler's 
creator specifies. Sose companies desand royalties on any prograa 
developed with their product. My favorite compiler is MTBASIC, by 
Seftaid, Inc. Their policy is that you can develop anything you 
want to and sell it, providing that in the docusentation and code 
of a program you have a credit, such as: "Cospiled using NTRASIC, 


“Softaid inc., P.O. Bor 2412, Colusbia M) 21045". | don't bave any 


objection to plugging a fine tool ( lika, so this object cade 
requirement is the kind of thing | wish every compiler saker 
would take to heart. 

What about sagazine listings? in the Home Computer vorld, 
this is a sajor source of programs. Need | teil you that zost ail 
of thea are copyrighted? They were virtually all written by users 


` Hke you and ae, who wished to share thee vith the coesunity of 


micro users that could be reached through the «sagazine. Public 
Domain style. Then the magazine paid thes a five-dollar fee, had 
thea sign a form giving thes exclusivity, and published it under 
the magazines copyright. The magazine usually has a hoch on the 
contests page where you vould never read it, which states, 
"Material contained herein is the property of HappyHose 
Computing, Inc. and say not be reproduced in any fore without 
obtaining express written permission [rom the publisher.” Great. 
Instead of Public Domain, which can go onto a Bulletin-Board, for 
instance, we have Fair Use Copyright, which can be typed into 
your computer but not shared. My feelings on this are that it is 
not fair, and that it can be licked. The program itself is 
shoving you a Source Algoritha, a solution to a particular 
problem done up in a language you use on your computer. Mov pick 
up the bail... and rewrite the program cospletely anew. Sure it 
is tougher, but the result will be Public Dosain. Adapt Cossodore 
listings to your Timex. The resulting code [S NEW CODE. No doubt 
about it. Your prograssing skills vill be better, too. Change 
stupid input chains to menus... write a different sort routine. 
Listings are to learn by, anyway. If all you vant is sossthing 


. for yourself, it doesn't matter. If you want to share, contribute 


ORIGINALLY. 

And that's what all this ent stuff is about. It is 
sisply a aatter of keeping the lazy and the dishonest free 
ruining someone's chances of doing the vork and doing it well 
enaugh to earn something, even if it's just recognition, as is 
mostly the case in hose computing. And when you write a program, 
consider the possibility of sharing it vith others in the Public 
Dosaia, which builds a base upon which education and 


- enlightensent for your ‘computer can (row. Healthy computer 
communities. need people and their programs to show the way. If 


you copyright, you are part of a market that is reguiated and 


" pretty secure-- now all you need is that skill and idea that will 


set the computer vorid on its’ ear. Good Luck! ge 

«€ THIS ARTICLE IS DECLARED SEPARATE FROM THE REST OF THE 
DALLAS TIMEX/SINCLAIR AMSTRAD USERS MEVSLETTER, FOR THE PURPOSE 
OF DEDICATING IT TO THE PUBLIC DOMAIN. THE AUTHOR'S INTENT IN 
DOING THIS [S TO INSURE THE EDUCATION OF COMPUTERISTS EVERTVHERE. 
>> - and | wanted to sake sure there vas at least One example of 
P.D. available.... 
HUHHIHIHHUHHHHHBHHH Soe you at the meeting! 
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FOR SALE 





XE BROTHER HR-5 THERMAL DOT MATRIX PRINTER 


INTERFACE: Parallel Centronics or RS-232 


PRINTING SPEED: 38 cps 







NO. COLUMNS: 840-90, 40-48., 65, 132 LES 

PAPER: single or continuous. Standard REE 
paper or thermal paper. 

PRICE: $150.00 







Andre Lavioiette 
1385 ouest, av. 

Montreal QUEBEC 
Phone: (514) 373 


Bernard suite ié 
HEY 181 
ais 
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The foiiouing information came from "TS HORIZON" (JULY 19984) 
You may not have seen this articie written by George Mockridge. 
So I am presenting it for uour information. There are some 


reallj good tips here. 


POKE ZIS689,X 
For keyboard click (1-255) 
=. POKE Z3692,2 
Scroll (can use 
3. POKE 23692,1 
Scroll Z2 lines 
POKE 23658,8 
Engage caps mode 
POKE 23658,0 
Disengage caps mode 
PAUSE @ 
Pause till any key pressed 
POKE 2356i,N (N = 1 TO 35) 
Interval of repeat key 


USR 3582 


8. POKE Z23562,M (N = 1 TO 5) 
Delay interval in repeat 
key 

9. USR 15082 
Break out of an infinite 
input loop w/o crashing 

10. DIM A$ (704) 


PRINT AT 0,9; OVER 1; PAPER 
1; INKS; AS 
Allows change to paper and 
ink color w/o CLS 


11. PRINT #1; AT 0,2; "HI" 
PRINT 41; AT 1,5; "BY" 
PAUSE Ø 
Prints on line 22/23 
12. LOAD ""CODE 
RAND USR 33792 
For programs which will 
not load 
13. RAND USR @ 


Will reset comouter 


14. INPUT AT 22,2: AT 
"INPUT VALUE";A$ 


Input at any position on 


19,2; 


screen 
15. OPEN # 2 
Sends all data normally 
destined for the screen 
to the printer 
i6. CLOSE # 2 
Cancels above command 
17. BASIC STARTS AT 2671 
18. CAPS SHIFT 3 
Scrolls two screen when 
listing 
19. POKE 23629, 
To use all 24 lines 
(unable stop program 
POKE 23659,2 resets. 


Use with INKEYS only 
POKE 26712,255 
Use to make lines dis- 
appear. POKE 26712,2 
will reset 
21. POKE 23617,236 
Use ti get a question 
mark in input statement 
PRINT # Ø; COMMENT"; PAUSE 
@ Use to print on line 
24. 


zu. 


22. 


oti 








CK TYPE 
& NEW STANDARD FOR "FOOL-PROOF" TYPING OF 
TS2848 PROGRAM LISTINGS IN MAGASINES. 


This program was originally published in the Mar/Apr 1987 
issue of TIME DESIGNS. I was very impressed by this simple yet 
elegant program. It is also very useful. How many peopie have 
typed in large programs and then spent hours trying to find and 
correct errors. This program gives a line by line listing of the 
number of bytes used and a syntatic sum for each line. Run this 
program with your typed in version, compare it to the published 
listing and it should be easy to locate your errors. I have 
taken the liberty of converting this program to the ZXB8i. 


9990 REM this basic program 9980 REM THIS BASIC PROGRAM 
uas taken from STAN LEMKE list. WAS TAKEN FROM STAN LEMKE LIST- 
ing, TIME DESIGNS (MAR/APR 87) ING, TIME DESIGNS (MAR/APR 87) 
9991 LET start=256#PEEN Z3636*PE 99931 LET START=14589 
EK 23635: LET stop=256*#PEEK 2362 9982 LET STOPzZS56*PEEK 144@1+PEE 
8+PEEK 23627: LET byt=start K 16400 
9902 LET line-zü: LET lenght=@: L 99835 LET BYT=START 
ET sum=ò 9984 LET LINE=a 
9993 LET line=256*PEERK byt+PEER 9985 LET LENGHT-) 
(byt+1): LET byt=byt+Z 9986 LET SUM=O 
9994 LET lenght=256*PEEK (byt+i) 9987 LET LINE=256#PEEN BYT+PEEK 
+PEEK byt: LET byt=bytt2 (BYT+1) 
9995 LET odd=1: FOR i-1 TO lengh 9988 LET BYTzRYT-Z 
t: LET sum=sum+ Codd-12)*PEEK bu t: 9989 LET LENGHT=254*#PEEK (BYT+1) 
LET odd=NOT odd: LET byt=byttl: +PEEK BYT 
NEXT i 9990 LET BYT=BYT+2 
9996 PRINT line; TAB 63": "; lengh 9991 LET QDD=1 
t; TAB 135": "sun 9992 FOR Isi TO LENGHT 
9998 IF bytistop THEN GO TO 9992 9993 LET SUM=SUM+(ODD+1)*PEEK BY 
9999 STOP T 


9994 LET ODD=NOT ODD 
9995 LET BYT=BYT+1 
999S>NEXT I 


9997 PRINT LINE; TAB 6;": ";LENGH 
EXAMPLE TsTAB 133": ";j SUM 
— 9998 IF BYT<STOP THEN GO TO 9984 
9990. : 87 : 10530 ' 9999 STOP 

9991 : 96 : 8966 

9992 : 43 : 4178 

9993 : 53 : 5151 

9994 : 55 : 5581 

9995 : 89 : 10292 

9996 +: 46 : 4490 

9998 : 22 : 2843 

9999 : 2 : 465 


| OOO 


be 


This program was given to me several years ago by Jim Webb 
(a former ZX81 user) He had seen this program listed in a 
magazine for the Commodore 64. This program as listed wil run on 
both the ZX81 and the TS2268. The only change would be at line 
9998 uhich must be reuritten to make it auto run for the 
specific machine. It is a good program and enjoyable. 


120 DIM A(9,9) 
izi DIM G:8) 
122 DIM HiB3) 
123 DIM CSC: 
124 DIM D$03) 


140 PRINT "GREETINGS FROM OTHEL 
Loi 

141 PRINT 

142 PRINT "MODIFIED FOR ZX81 BY 
**JIM WEBB, DEC. BZ" 


143 PRINT 

i44 PRINT 

i58 PRINT “INSTRUCTIONS (Y OR M 
CH 

160 INPUT X$ 

170 IF X$-"N" THEN GO TO 398 

i80 IF X$z»"Y" THEN GO TO 168 

19@ PRINT "xe" 

SAB CLS ` 
2@1 PRINT "OTHELLO IS PLAYED ON 
AN 8X8 CHECKER BOARD," 
zi0 PRINT "ROWS:1-8; COLUMNS: A- 
H" 

220 PRINT "INITIAL BOARD IS ALL 
BLANK, EXCEPT FOR THE CENTR 
E 4 SQUARES" 

230 PRINT "THESE FORM THE PATTE 
RN" 
z240 PRINT " * o" 

250 PRINT 

255 PRINT " oO x" 

70 PRINT 

273 PRINT "ENTER SPACE TO CONTI 
NUE" 

274 INPUT Z$ 

275 IF Z$<>" " THEN GO TO 274 

280 CLS 

290 PRINT "TRY TO PLACE YOUR PI 
ECE SO THAT IT OUTFLANKS MINE,CR 
EATING A "; 

295 PRINT "HORIZONTAL,VERTICAL 
OR DIAGONAL RUN OF MY PIECES ROU 
NDED AT EACH" 

300 PRINT " END BY AT LEAST ONE 

OF YOURS." 

3Q1 PRINT 

302 PRINT "ENTER SPACE TO CONTI 
NUE" 


303 INPUT Z$ 
304 IF Z$<>" " THEN GO TO 303 
385 CLS 
310 PRINT "THIS WILL FLIP MY PI 

ECES, TURNING THEM INTO YOURS." 
320 PRINT "NOTEx««,YOU MUST CAP 

TURE AT LEAST ONE OF MINE IN 
THIS WAY IF IT IS POSSIBLE " 

30 PRINT "OTHERWISE YOU FORFEI 

T A TURN BY ENTERING (Q,Q)" 

389 PRINT "ENTER SPACE TO CONTI 

NUE" 

381 INPUT Z$ 
382 IF Z$<y" 
383 CLS 

3990 PRINT "SHOULD I WAIT?(Y OR 


" THEN GO TO 381 


488 PRINT 
405 LET Fz-ü 
410 INPUT X$ 
420 IF X$="N" THEN GO TO 468 
430 IF X$<>"Y" THEN GO TO 410 
440 LET F2=1 
450 PRINT "TYPING ANY CHARACTER 
LETS ME GO" 
460 PRINT "SHOULD I USE MY BEST 
STRATEGY?(Y OR N)" 
470 LET S2=@ 
480 INPUT X$ 
490 IF X$="N" THEN GO TO 520 
500 IF X$<>"Y" THEN GO TO 480 
510 LET S2=2 
520 LET B=-i 
530 LET Wei 
540 LET D$(B+2)="0" 
550 LET D$(Q+2)="." 
560 LET D&(Wte) =" x" 
561 LET G(1)=@ 
562 LET G(z)--1 
563 LET G(3)=-1 
564 LET G(4)=-1 
565 LET 6(5)=Q 
566 LET G(6)=1 
567 LET G(7)=1 
568 LET G(8)=1 
620 LET H(1)=1 
621 LET H(2)=1 
22 LET H(3)=Q 
23 LET H(4)=-1 
624 LET H(5)=-1 


LOGE 


625 LET H(6j=-1 
626 LET H(7)=Q 
627 LET H(8)=1 
660 LET CS(1)="A" 
661 LET C$(Z)="B" 
662 LET C$(Z3)="C" 
663 LET C$(4)="p" 
664 LET C$(5)-"E" 
665 LET C$(4)="F" 
666 LET C$(7)="G" 
667 LET C#(8)="H" 
700 FOR I=i TO 9 
710 FOR J=1 TO 9 
720 LET A(I,J)=Q 
730 NEXT J 
74Q NEXT I 
750 LET A(4,4)=W 
760 LET A(5,5)=W 
770 LET A(4,5)=B 
780 LET A(5,4)=B 
790 LET Ci=zz 
800 LET Hi=z 
810 LET Ni=4 
820 LET Z=0 
840 PRINT "DO YOU WANT © OR * 7? 
850 LET Ch 
860 LET H-B 
870 INPUT X$ 
880 IF X$-"O" THEN GO TO 920 
` B90 IF X$<>"*" THEN GO TO 870 
_ ...908 LET C-B. 
910 LET H=W 
920 PRINT "DO YOU WANT TO GO FI 
RST(Y OR ND" 
930 INPUT X$ 
'  94Uü IF X$="N" THEN GO TO 1020 
950 IF X$<2"Y" THEN GO TO 930 
965 CLS 
970 GO SUB 3100 
980 GO TO 1690 
1000 IF F2=0 THEN GO TO 1020 
1010 INPUT X$ 
1020 LET Bi=-i 
1930 LET I3=2 
1040 LET Ti=c 
1050 LET T2=H 
1070 FOR I-1 TO 8 
i080 FOR J-1 TO 8 
1090 IF ACI,J)<2>@ THEN GO TO 138 
Q 
1120 GO SUP 2620 
1130 IF Fi=@ THEN GO TO 1380 
1170 LET U--1 
1180 GO SUPR 2820 
1200 IF Si=Q THEN GO TO 1380 
1210 IF (I-1)*(I-8)<>@ THEN GO T 
Oo 1230 
1220 LET 81-81-52 


1230 IF (J-1)*(J-8)<2@ THEN GO T 


O 1260 


.1825 


1240 LET $1=S1+$2 
126@ IF S1«Bi THEN GO TO 
1270 IF Si>PBi THEN GO TO 
1310 LET R=RND 

1320 IF R:Q0.5 THEN GO TO 1380 
1340 LET Bi=Si 

1350 LET I3=I 

1360 LET J3=J 

1380 NEXT J 

1390 NEXT I 

1410 IF B12@ THEN GO TO 
1430 PRINT 
MOVE" 
1440 IF Z=i THEN GO TO 2190 

1450 LET Z=1 

1460 GO TO 1690 

i480 LET z-ü 

1490 PRINT "I WILL MOVE TO "; 

1500 PRINT IZ; 

1512 PRINT " "; 

1520 PRINT C$(JI3) 

1530 LET I-IZ 

1540 LET J«J3 ` ' 
1550 LET U=1 i 
i560 GO SUR 2820 
1570 LET Ci=C1i+Si+i : 
1580 LET Hi=H1-Si i 
1590 LET Ni=Ni+i i 
1595 CLS 

1600 PRINT "THAT GIVES ME "; 

1610 PRINT Si; 

162@ PRINT " OF YOUR PIECES" 

1640 GO SUPR 31009 

1640 IF H1=Q THEN GO TO 2190 

1670 IF Ni=64 THEN GO TO 2190 

1690 LET Ti=H 

A700 LET T22C |... | . oe eens 

1710 PRINT "YOUR MOVE-- (ROW, COL 

UMN)" š 


i380 
1340 


1480 
"I HAVE TO FORFEIT MY 


- 1720 INPUT I 


1721 INPUT X$ | 


1730 IF 120 THEN GO TO 1720 
1740 IF Ip THEN GO TO 1720 | 
1750 IF I<>@0 THEN GO TO 1820 


1760 PRINT 
OUR MOVE?"; 
1770 INPUT X$ 

1780 IF X$z-"Y" THEN GO TO 
1790 IF Z=1 THEN GO TO 219@ 
1800 LET Z=i 

1810 GO TO 1000 

1820 LET J=Q 

FOR P=1 TO 8 

LET J9=P 

IF C$(J9)=X$ THEN GO TO 183 


"ARE YOU FORFEITING Y 


1710 


1826 
1830 
5 

1832 
1835 
1836 
1840 


GO TO 1840 
LET J=J9 
LET J9=8 
NEXT P 





2449 GO TO 2590 
z450 PRINT "GOOD FIGHT" 
27460 GO TO 2500 
2470 PRINT "HOT GAME**" 
z480 Go TO 2500 


i850 IF J=@ THEN GO TO 1720 

1870 IF ACI,J)=@ THEN GO TO 1910 
1880 PRINT "SORRY,OCCUPIED: TRY 

AGAIN" 

Mane E 2490 PRINT "SQUEAKER*" 

1910 GO SUB 2620 Bene L 

1920 IF Fi=i THEN GO TO 1974 v is y " 

XT TO ONE OF MY PIECES, TRY AGAIN 


2520 INPUT X$ 

A - = S530 IF X$-"Y" THEN GO TO 7@@ 

o o0 xl = Y M m 
1970 LET U--1 — 2540 IF X$<>"N" THEN GO TO 2520 
D Ra ce Uc odd 2550 PRINT "THANKS FOR PLAYING" 

: gon 2560 STOP 


1990 IF S120 THEN GO TO 2830 
ZU PRINT "SORRY, THAT DOESNT FL 
ANK A ROW. TRY AGAIN" 


26208 LET Fi=Q 
z630 FOR P--1 TO 1 


S5 acu AN 2631 IF I+P=0 THEN GO TO 2470 
2030 LET Z=Q 2640 FOR Q--i1 TO 1 ^ ^ — 
2035 CLS 2641 IF J+Q=Q THEN GO TO 2460 


2040 PRINT "THAT GIVES YOU "; op A(I+P, J+Q)=TE THEN GO TO 
2050 PRINT Si; En em 
2050 PRINT " OF MY PIECES" Boot GO T9 2660 
- pa 2655 LET Fi=i 
2070 LET U-1 E 
= SE m 2656 LET Ji=i 
2080 GO SUP 2820 ondes Mm 
2090 LET Hi=Hi+Si+i be W 
S 2660 NEXT Q 
2100 LET C1=C1-S1 = 
D 2670 NEXT P 
2110 LET Ni=Ni+i = 

- 2480 RETURN 
2130 GO SUR 3100 passed S Së 
215@ IF Ci=Q THEN GO To z190 E ee TO 
21460 IF Ni=64 THEN GO TO 21990 z - : 


m " S ES z840 LET IS=GIK) 
2165 PRINT "PRESS SPACE FOR ME T 5850 LET JS=H(K) 


0 GO"; z 
2860 LET I&-I-IS 
2166 INPUT N$ a ai 
= = i) LI a 
2157 IF N@<>" " THEN GO TO 2144 Hos Pt Ted THEN GO TE SOT 


2870 LET Jé6é=J+J5 
2875 IF J6=Q0 THEN G 
z880 LET S3-ü 

2890 IF ACI6,J6)¢2T2 THEN GO TO 
3070 

2910 LET S3=S3+1 

2920 LET I6=IÓ6ó+IS5 

2925 IF I16=@ THEN GO TO 3070 
2938 LET J6-J6-J5 

2935 IF Jó-0 THEN GO TO 3070 
2940 IF ACTI6,7J6)=T1 THEN GO TO Z 


2170 GO TO 1000 

z190 PRINT 

z200 PRINT "YOU HAVE "; 

2210 PRINT Hi; 

2228 PRINT "PIECES # I HAVE "; 
223@ PRINT C1; 

224@ PRINT "PIECES" 

2250 IF Hi=Ci THEN GO TO 2290 
2260 IF H1i>Cl THEN GO TO 2310 
2270 PRINT "SORRY,I WON THAT ONE 
RHE" 


0 TO 3070 


9710 
2280 GO TO 2320 S Béi 
2 (16,J6)=@ THEN GO TO 30 


2300 GO TO 2500 
2310 PRINT "YOU WOhN*s" 
2320 LET C1=C1i-Hi 


2960 GO TO 2910 
2970 LET S1-81453 
2980 IF Uz»1 THEN GO TO 3070 


2330 IF Ci»Q THEN GO TO 2350 E Dm 

2340 LET Ci--Ci 3010 LET J&-J 
2350 LET Ci-(54*C1)/N1 SAD FON: Rèn, Tü És 
2360 PRINT "THAT WAS A "; 3025 LET Ki=R 
2370 IF Ci«il THEN GO TO 2490 


aioe Z= > Oe u 3@26 IF J6=Q THEN GO TO 3860 
s e ee MEL eee 3027 IF 16-0 THEN GO TO 3060 


2390 IF C1«39 THEN GO TO 2430 3030 LET A(I6, J6)=TI 
"ipm ase 55 E SE 3040 LET I6-16*I5 
241@ PRINT "**#PERFECT GAME* 3050 LET J6zJ6+J5 


2420 GO TO 2500 
m G6Q NEXT R 
Z430 PRINT "WALKAWAY*" Ë 


pO 


NEXT K 
RETURN 


PRINT 
PRINT 


FOR I= 


PRINT 


FOR J= 


PRINT 


I The follouing programs have 
His documentation is as usual e 


Have you at one time or another forgotten the name of a 


3160 PRINT D$(A(I,J)+2); 
3170 NEXT J 


4180 PRINT 
" ARCDEF GH" “3185 PRINT 
1 TO 8 319@ NEXT I 
I; 3210 RETURN 
1 TO 8 382Q STOP 


9998 SAVE "OTHELLO" 


been given to me by Dave Solly. 
xcellent. Read on. 


Frogram Reader 
for the 
Timex-Sinclair 1000/1500 


c 


praticular Timexe-Sinclair 1000 program but didn't want to 


wait 
hand! 


the 10 minutes and more to see what it was? Help is at 
This routine will read and print the name the program 


was saved under, all in a few seconds and without affecting 
the saved program. 


First, type in Listing l remembering the 75 character 


REM statement. This listing creates the machine code 
workhorse of the program. Save then run the program. Test 
the program by rewinding to the beginning of the tape and 
typing RAND USR 16514 and playing the tape. If the computer 
returns you to BASIC with the name of the program displayed 
on the screen then the machine code is ok. if the program 
does not return you to BASIC or if it crashes then there is 
most likely a mistake in the machine code. Reload the tape 
and check both the length of your REM statement and the data 
contained in Af in line 10. Correct any mistakes, save, run 
and test the program again. If the program then runs without 
any problems you can proceed. I would avise at this point; 
however, that you keep at least one good copy of the first 
program. 


Listing 1 
Machine Code 
and 
Hex Loader 


1 REM CNote: 75 characters 
must be typed in this REM ] 
statement to hold machine codel 
AL COSEOFCDBA4OiBFBOEO106003E7F 
DBFEDZFF1FD242021717381110F1F1CD 
BQAAOCE7A792001D71720FA181DDS1E94 
O6161DDBFE17CB7B7BZ8FS10FSD12004 
FESASZOCSZFCB113003C9C98" 

20 LET X=16514 


(CX GO 


FJ 


Frogram Reader 


20 IF Af="S" THEN STOF 
40 PORE X,16*CODE A#(1)+CODE 
AE (2)-476 
SO LET X=X+1 
DS PRINT AF( TO 2250s" "š 
60 LET AF=AFCZXI TO ) 
70 GO TO 30 
go STOF 
9000 REM SAVE ROUTINE 
90029 FAUSE 100 
9010 POKE 143790,9 
QOZO SAVE "READER, Bi" 
9040 IF FEEK 16290=9 THEN SAVE 
"READER, Bi" 
9050 PORE 167970,0 
90060 LIST 





For those who wish you can delete lines 10 to the end, 
resave and use the program as it is. The machine code is 
relocateable and can be kept above ramtop for those of you 
who have larger memories or stored in a Hunter Board NVM. 
For my own use I have created Listing Z which allows you to 
list several programs in succession on the screen without 
having to repeat typing the RAND USF call. Some of you might 
even want to add a screen copy routine in order to create a 
permanent record of the programs on a given tape. 


Listing 2 
Main Frogram 
with 
Instructions 


1 REM [Note: This will be the 

75 bytes of machine code saved 
in the REM statement fram 
Listing 11 

iO REM LISTING 2 BY DAVID 
SOLL Y 

20 CLS 

*O PRINT "THIS FROGRAM WILL 
ALLOW YOU TO READ THE NAME 
UNDER WHICH A FROGRAM HAS 


1-354 


Frogram Reader 


BEEN SAVED WITHOUT HAVING TO 
LOAD THE ENTIRE FRO- GRAM." 

40 FRINT "THIS MAY BE USEFUL 
IF THE FROGRAM NAME HAS 
BEEN FOKGOTTEN OR IF THE FROGRAM 
FAILS TO LOAD WITH: """"," 

SO FRINT 

60 PRINT "instructions: " 
CNote: Typed in inverse 
characters] 

Zü FRINT 

SO PRINT "START THE TAFE TO BE 
READ AND HIT ANY HEY. THE 
COMPUTER WILL AFFEAR TO BE 
DOING à NORMAL LOAD. WHEN A 
"U"HMEADER"" HAS BEEN DETECTED 
THE COMPUTER WILL STOF AND 
DISPLAY THE TAFE FRO- GRAM 
NAME. " 

90 PRINT "HIT ""YvY"" TO READ 
ANOTHER HEADER OR ANY OTHER KEY 
TO STOF." 

100 IF INEEYf="" THEN GOTO 100 
110 CLS 
120 RAND USR 16514 
120 PRINT 
140 FRINT 
145 IF PEEK 1644224 THEN 
SCROLL 
150 FRINT "HIT ""Y"" TO READ 
ANOTHER HEADER" 
155 FRINT 
160 IF INKEY£-"" THEN GOTO 160 
170 IF INKEY#="Y" THEN RUN 120 
180 PRINT 
190 PRINT "TYFE ""RuUN"" TO 
RESTART FROGRAM. " 
8999 STOF 
9000 REM SAVE ROUTNE 
9005 FALISE 100 
9010 FREE 163790,9 
9020 SAVE “READER. HI" 
9040 IF FEEK 16390=9 THEN SAVE 
“READER. BS" 
9050 FOKE 16790,0 
9060 RUN 


Frogram taken in part form the August 1986 edition of SMUG 


BYTES 


VA AO 


EYESIGHT SAVER 


The following is a copy of an article which first 
appeared in Practical Computing, May 1984. Although the 
program was designed to run on the Specturm the following 
listing has been modified so that it will run on the 
Timex-Sinclair 2868. 


Anyone who has copied programs from this or any other 
page will know it plays havoc with the eyesight if the 
coding is packed to maximum density. This is fine for memor 
economy but terrible for reading and copying. But hope is a 
hand. CP Marriner of Grinsbu has developed a small routine 
which will shake up a program of multi-statement lines sa 
that each statement is on a new line, 


L 
t 


The Spectrum stores progams in memory from location 23755 
Or in the case of the Timex-Sinclair 2@48 from location 
26710. Each line of the program is then stored with two 
bytes for the line number and two bytes holding the length 
of the text, the text of the line and an end-of-the-line 
marker CHR$(13). 


The routine lists any Basic program with the following 
changes. Every time a colon ar the keyword Then is found a 
new line is started with the carrect indentation to match 
the proceeding line. The result is a program listing which 
is not onlu easier to read but also a listing uhich is 
rendered in a format which much resembles structured Basic. 


In practice the routine is merged with the programand 
suitably isolated. To print the formatted listing enter Goto 
9000 or its equivalent if you have renumbered. 


Program Listing 


9900 REM Format listing 
TS 2668 Version 
9905 OPEN#2,"p": LET dsp=@: REM Printer, spacing 
9910 LET n=2671@: REM Spectrum 23755 
9915 IF dsp=1 THEN PRINT 
9920 PRINT ”: PRINT 256*PEEK n+PEEK (n+1); 
9925 LET space=LEN STR$ (256*PEEK n+PEEK (n+1))+1 
9930 IF Z56xPEEK n+PEEK (n+1)2=9899 THEN OPEN #2,"s": PRINT 
" O.K” E STOP 
9935 FOR i=n+4 TO n+3+PEEK (n+2)+2546*#PEEK (n+3) 
9940 IF PEEK i=58 THEN PRINT ":";TAP spacey: GO TO 9960 
9945 IF PEEK i2-3z THEN PRINT CHR$ PEER ij 
9950 IF PEEK i=14 THEN LET isi+5 je 
9955 IF PEEK i=2@3 THEN PRINT "TAR space; 6 
9250 NEXT i \ \ \ \ 


9965 LET n=(n+3+PEEK (n+2)+256xPEEK (n+3)+1) 

9970 GO TO 9915 

9975 STOP 

9980 SAVE "Llist": SAVE "Liist" 

9985 SAVE "Llist": SAVE "Llist" 

9996 CLS : PRINT "Verification: Rewind tape and play." 
9990 VERIFY "Llist": VERIFY "Llist" 

9995 VERIFY "Llist": VERIFY "Llist" 


This article was retyped with modifications for the 
Timex-Sinclair 2068 bu: 
David Solly, 
Ottawa TSUG, 
January 9, 1987. 


Copal Screen Copier 
By 
David Solly 


This screen copy program is a modification of a program 
written by John Bennett. The original program appeared in ZX 
Computing Monthly for February, 1987, pages 124 to 125. I 
have reworked the program to work on a Copal Write Hand 


L1200 in conjunction with the latest version of the Larken 
DOS. 


How the program works 
Line 1050 is a command to the Larken DOS to open stream 
number three to the line printer. 


Line 1060 does a cold start on the Copal Write Hand. 


Line 1070 de-selects the line-feed otherwise there would be 
gaps in the copy we are trying to make. 


Line 1160 selects the 8/72" inch spacing mode on the Copal 
Write Hand. 


Line 1180 puts the Copal Write Hand into graphics mode. 


Line 1200 is a test to see if the Copal Write Hand is ready 
to print the next character. 


Line 1210 is the actual work horse of the program. It uses 
the Out command to feed character codes directly to the 
Copal Write hand. If that were not done the printer would 
print Sinclair tokens for some of the graphics. 


Lines 1250 to 1270 prints a few lines after the screen copy 
has been completed and returns the printer to the normal 
printing mode. 


\ OOO O 


D. Solly 


Copal Screen Copy 


Program Listing 
Timex-Sinclair 2068 and ZX Spectrum 


1000 REM "OFUSCOFY: JOHN BENNETT 

1010 REM "Modifications for Larken DOS and 

Copal Write Hand L1200 printer by David 

Solly, Ottawa, Ontario, Canada. 

1020 BORDER 1: FAFER 6: CLS 

1070 REM "COFAL COFY/Copal Write Hand L1200 

19040 FRINT AT 5,0; COFAL FRINTER COPY ROUTINE 

1986": FRINT '' 

1050 PRINT #4: OFEN #2,"lp": REM Changed for 

Larken DOS. 

1060 LFRINT CHRE 27s:CHR£$ 45643: REM Cold start 

printer. 

1070 LFRINT CHRE 193: REM Deslects line-feed 

1980 PRINT "Set your 

printer up first then LOAD your picture or 

SCREENS. The printer will start up 
automatically after 15 seconds. It will 

then take about six minutes to print a 

full screen" 

1090 INFUT “Enter title of SCREEN to LOAD 

We NE 

1100 PRINT #1;AT 1,03" Load from Tape or 

Disc? (T/D) ": FAUSE O 

1110 IF INKEY£-"d" OR INKEY#="D" THEN GO TO 

1140 

1120 IF INKEY#<>"t" AND INKEY#<>"T" AND 

INEEYÈ: »"d" AND INEKEYE£: "D" THEN GO TO 1100 

1130 LOAD N#SCREENTf : GO TO 1160 

1140 PRINT #4: LOAD N£SCREENf : REM Larken 

Disc system. 

1150 REM Copy 

1160 LFRINT CHRE 27; "A"3;CHRE 8; 

1170 FOR H=175 TO © STEF -8 

1180 LPRINT CHRE 273 "KE"3CHRE£ O CHRE 1: 

1190 FOR W=O TO 255 

1200 IF IN 127=253 THEN GO TO 1200: REM 

Waites for the printer to be ready. 

1210 OUT 127, (128*#FOINT (W,H)-t64*PFOINT 

(W,H-1)-22*FOINT (W,H-Z)+16#FOINT 

(W,H-I)+BxFOINT (W,H-4) +4xFQINT 

(W,H—5) -2*POINT (W,H-6)-*FOINT (W,H-7)): REM 

Sends screen information directly to the 

printer. 


FJ 


EGOIT 


D. Solly 


1220 

270 
1240 
i250 
1260 
1270 


NEXT W 
LPRINT 
NEXT H 
LPRINT 
LFRINT 
LFRINT 


printer. 
1280 REM Fut here the codes for the format 
the printer will need for the next task. 


1290 


STOF 


Copal Screen Copy 


CHR 10; 


sz LPRINT : LPRINT 
CHRE 18;: REM Reset Line-Feed. 
CHRE 27:CHR£ 643: REM Cold start 


1300 PRINT #4: SAVE "Copal. Bi” LINE 1 


LOO1O 


